Розробка інформаційно-довідкової системи Пристрій персонального комп`ютера

РЕФЕРАТ

Пояснювальна записка:

Даний програмний продукт, виданий як тема для курсового проекту, представляє собою реалізацію інформаційно-навчальної системи призначеної для ознайомлення і навчання користувачів основних пристроїв персонального комп'ютера. . У програмному продукті реалізовані наступні можливості:

надання довідки про розробника системи;

наочне представлення основних пристроїв персонального комп'ютера; довідка про певні пристроях персонального комп'ютера;

надання довідки по роботі з програмою;

Ця програма зручна у використанні, так як має простий і інтуїтивно-зрозумілий графічний інтерфейс.

Перспективами подальшої розробки програмного продукту є: оптимізація графічних можливостей наочного зображення персонального комп'ютера, збільшення обсягу інформації про пристроях.

КОМП'ЮТЕР, СИСТЕМНИЙ БЛОК, ЖОРСТКИЙ ДИСК, БЛОК ЖИВЛЕННЯ, слоти пам'яті, відеокарта, звукова карта, З, D - ROM, Процесори, материнські плати.

ЗМІСТ

ВСТУП

1. ПОСТАНОВКА ЗАВДАННЯ

1.1. Мета розробки

1.2. Функціональні вимоги

1.3. Інформаційні потоки програми

2. ОПИС І ОБГРУНТУВАННЯ МЕТОДУ РІШЕННЯ

3. АЛГОРИТМ РОЗВ'ЯЗУВАННЯ ЗАДАЧІ

3.1. Словесний опис алгоритму програми

3.2.Алгорітм програми

4. ПРОЕКТУВАННЯ ІНТЕРФЕЙСУ

4.1. Обгрунтування обраного виду інтерфейсу

4.2. Особливості організації обраного графічного режиму

5. ОПИС ПРОГРАМНОЇ РЕАЛІЗАЦІЇ

5.1. Функціонально-логічна схема

5.2. Опис структур та форматів

5.3. Основні процедури

5.4. Схема взаємодії підпрограм

5.2. Порядок встановлення

5.3. Запуск програмного продукту

6. АНАЛІЗ ЕФЕКТИВНОСТІ

ВИСНОВКИ

СПИСОК ВИКОРИСТАНОЇ ЛІТЕРАТУРИ

Додаток А

Додаток Б

Додаток В

Додаток Г

ВСТУП

На сьогоднішній день, різноманітні інформаційно-навчальні системи є, поряд з комп'ютерними іграми, мабуть, одним із самих популярних і затребуваних видів програмного забезпечення. Їх призначення - допомога в процесі придбання та накопичення користувачем знань і навичок у вузьких предметних областях. Спектр застосування інформаційно-навчальних систем досить широкий, і це обумовлює високий споживчий попит на програмні продукти подібного типу, що в свою чергу сприяє подальшому їх розвитку, і появи все нових і нових видів навчальних систем. Практично на кожному персональному комп'ютері можна зустріти хоча б одну таку програму. Їх надійність та високі показники ефективності призвели до того, що інформаційно-навчальні системи стали широко застосовуватися в багатьох школах і вузах. А використання ними новітніх досягнень в області мультимедіа дозволяє використовувати такі системи навіть у процесі так званого дистанційного навчання.

Варто відзначити, що, деякі навчальні системи дозволяють так само моделювати на екрані ситуації, близькі до реальних. І це зумовлює ще одну можливість застосування інформаційно-навчальних систем, а саме, їх використання в якості тренажерів - симуляторів при підготовці та перепідготовці фахівців самих різних рівнів в самих різних областях знань.

Років п'ятнадцять тому, фантазія зарахувати комп'ютер до "побутовим" пристроїв могла виникнути лише в дуже розумною - і злегка нездорової голові. У самому справі, серйозне обчислювальний пристрій, знаряддя для справжніх професіоналів, а не для "побутових потреб" людства. Але йде історія взяла своє і вже в наш час персональний комп'ютер - це пристрій повсякденному житті. І я думаю, що з маленьких років, людина повинна розуміти внутрішній вміст комп'ютера, а не тільки бути лише користувачем цього дивного пристрою.

Дана інформаційно-довідкова система дозволяє ефективно зберігати необхідну користувачу інформацію та здійснювати швидку навігацію по накопиченому в базі матеріалу.

Таким чином, простота поводження з інформаційно-навчальними системами, їх доступність та зрозумілість широкому колу користувачів, повнота і структурованість викладеної в них інформації, можливість вибору найбільш підходящого для кожного конкретного користувача методу навчання сприяють усе більшій і більшого зростання їхньої популярності. Комп'ютер, забезпечений інформаційно-навчальною системою ставати не просто машиною для проведення складних розрахунків, а й активним помічником у процесі придбання та накопичення нових знань.

1. ПОСТАНОВКА ЗАВДАННЯ

1.1. Мета розробки

Метою розробки даного програмного продукту є створення вузькоспеціалізованої інформаційно-навчальної системи призначеної для ознайомлення і навчання широкого кола користувачів, яких цікавить внутрішній вміст комп'ютера.

1.2. Функціональні вимоги

Оскільки основним завданням даного програмного продукту є навчання, то необхідною є його орієнтація саме на користувачів. Необхідно створити умови, при яких ефект від процесу навчання був би максимальним. Тобто необхідно створення простого, зрозумілого, функціонального і привабливого для користувача інтерфейсу, а так само зручних інструментів, які дозволили б використовувати можливості інформаційно-навчальної системи в повній мірі.

З цієї точки зору оптимальним є графічний інтерфейс. Він зручний і практичний у використанні, а так само є інтуїтивно-зрозумілим, що в нашому випадку є не менш важливим.

Управління основними можливостями системи має бути організовано за допомогою системи розкривних меню, доступ до яких має забезпечуватися безпосереднім вибором.

Довідкова система повинна містити інформацію про спосіб навігації в системі, функціональні клавіші, інформацію про розробника програмного продукту і основні можливості якими володіє дана система.

Система навчання повинна забезпечувати простоту доступу користувача до необхідної йому інформації, а це надає простий графічний інтерфейс, і кнопка вибору певного пункту.

1.3. Інформаційні потоки програми

Даний підрозділ містить схему інформаційних потоків, які фігурують у програмі.

Малюнок 1.1. - Схема інформаційних потоків

Дана схема надає основні інформаційні потоки даного програмного продукту. Циліндр показує дані, що зберігаються на жорсткому диску комп'ютера. Прямокутник зображує дані, які виводяться на екран.

Стрілками вказані рух інформації в блоках.

Програма.

- Дані, що зберігаються на диску;

- Дані, що виводяться на екран;

Даний продукт розбитий на п'ять блоків, за якими закріплена певна інформація:

- За блоками екранного привітання, зображення пристроїв комп'ютера, заставки закріплена певна інформація, що виводиться на екран монітора за допомогою програмного коду продукту;

-За блоками інформаційних матеріалів і керівництва користувача закріплена інформація у вигляді файлів, які знаходяться на жорсткому диску.

- За блоками інформаційних матеріалів і керівництва користувача закріплена інформація у вигляді файлів, які знаходяться на жорсткому диску.

2. ОПИС І ОБГРУНТУВАННЯ МЕТОДУ РІШЕННЯ

Головними завданнями, поставлені перед програмою були: створення інформаційної бази матеріалу, висновок з цієї бази необхідного файлу і наочне надання користувачу внутрішнього устрою комп'ютера. Програма представляє з себе комплекс процедур і функцій, призначених для вирішення вищезазначених завдань. При запуску програми, відбувається початок діалогу користувача з програмою, що реалізований за допомогою графічних користувальницьких меню. Ці меню є чимось на зразок посередника між користувачем і інформаційно-довідковою системою. При необхідності користувач може скористатися необхідним пунктом у меню і тим самим запустити якийсь процес.

Кожен пункт у меню реалізований у вигляді окремої процедури. Це дозволяє легко орієнтуватися в написаному коді і за потреби вносити необхідні корективи і зміни.

3. АЛГОРИТМ РОЗВ'ЯЗУВАННЯ ЗАДАЧІ

3.1. Словесний опис алгоритму програми

Структура програми представляє собою комплекс процедур і функцій. Цей комплекс підпрограм становить загальну функціональність всієї програми в цілому.

Після запуску програми на екрані відбувається очищення його, а потім, виконання процедури, яка відображає екранну заставку, що містить інформацію, яка містить значення цього програмного продукту. У разі натискання кнопки продовження користувач автоматично переходить до головного меню. Потім виконується інша процедура, яка виводить спеціально розроблений інтерфейс програми, потім виконується процедура, що відповідає за роботу головного меню. Далі виконується процедура, яка відстежує натискання клавіш, передбачених у тілі даної підпрограми. При натисканні відповідної клавіші ця процедура робить запуск відповідної процедури. Далі пересуваючись по екранному меню, користувач зупиняється на певному пункті, для яких заздалегідь передбачені процедури, що відповідають за кожен пункт. Екранне меню, розроблене в графічному режимі, містить п'ять пунктів: про програму, наочне уявлення ПК, інформаційний матеріал, керівництво користувача вихід.

У разі вибору процедури "про програму" на екран виводиться графічний інтерфейс, що надає користувачеві інформацію про розробника.

У разі вибору пункту "наочне уявлення ПК" на екран виводиться графічний приклад зображення персонального комп'ютера.

У разі вибору пункту "інформаційний матеріал" користувач отримує доступ до ще одного меню, який містить дев'ять пунктів: системний блок, материнська плата, процесор, відеокарта, звукова карта, блок живлення, слоти пам'яті, cd - rom, вихід. Кожному пункту меню відповідає свій текстовий файл, що зберігається на жорсткому диску. Пункт "вихід" завершує програму.

У разі вибору пункту "керівництво користувача" користувач має право ознайомитися з програмою в цілому. Даний пункт містить спеціальний файл, який також зберігається на жорсткому диску.

У разі вибору пункту "Вихід" користувач автоматично завершує роботу з програмою.

Для виведення наявного матеріалу в інформаційно-довідкової базі запускається окрема процедура, яка ініціалізує і читає текстовий файл з інформацією про наявні інформаційних файлах і шлях до них на диску.

3.2.Алгорітм програми

При створенні даного програмного продукту використовувався принцип низхідного програмування, тобто завдання розбивалася на деякі підзадачі, кожна з яких у свою чергу знову деталізувалося, поки не досягалися, прості завдання. У першу чергу були виділені і вирішені наступні чотири основні підзадачі:

- Організація для користувача інтерфейсу;

- Організація зображення комп'ютера;

- Організація меню інформації пристроїв;

- Організація зображення титульного аркуша.

Слід зазначити, що система була реалізована таким чином, що в кожний конкретний момент часу її стан могло змінитися тільки в результаті деяких дій користувача. Тому система використовує тільки так званий послідовний процес, при якому всі дії виконуються строго послідовно. На малюнку 2.1. представлений алгоритм роботи основної програми. Зауважимо, що структурної основною одиницею процесу роботи програми є процес обробки команди користувача. Йому належить основний пріоритет.

Ні Так

Малюнок 3.1. - Алгоритм роботи програми

Малюнок 3.1. показує алгоритм даного програмного продукту. Його дія обумовлена ​​наступними кроками, які з легкістю управляються користувачем:

На початковому етапі роботи програми необхідна її ініціалізація;

2) Після цього промальовується екранне привітання, яке задає користувачеві питання про продовження роботи програми;

3) Відбувається обробка команди користувача. У разі відмови роботи і натискання кнопки завершення, програма завершує свою роботу;

4) У разі продовження користувач потрапляє на наступний рівень програми, яка промальовує робоче меню, що складається з п'яти пунктів, яким відповідає певні процедури. Рухаючись по меню користувач робить вибір;

5) Після цього відбувається обробка команди користувача, яке завершується або 6), або 8), або 9), або 14), або 12) рівнем;

6) промальовує зображення комп'ютера. Після натискання клавіші керуючої, 6) - ой рівень переходить в 7);

7) Рівень обробки команди користувача, що завершується або 4) рівнем,

або 14);

8) Рівень промальовування титульного аркуша, інцидентних 6) - переходить у 7) - ій;

9) Рівень промальовування інформації пристроїв, який за допомогою керування користувача переходить у 13) рівень;

10) Рівень обробки команди користувача завершується або 11), або 14) рівнем;

11) Рівень завершальний дії (закриває файли) і повертає на 7) рівень;

12) Рівень промальовування керівництва користувача, що завершується 10);

13) Рівень закриття інформаційних файлів, у випадку пункту виходу рівень переходить на рівень 14), інакше повертає значення на рівень 9).

3.3. Обгрунтування вибору мови програмування

Даний курсовий проект написаний на мові Turbo Pascal версії 7.0

Звичайно, варто віддати належне Паскалю як мові програмування за його наочність при роботі з такими загальними для всіх мов програмування темами, як структури даних, рекурсія, способи та механізми передачі параметрів. А ось що головне в Паскалі, так це його простота: саме тому він в більшості випадків використовується як навчальний мову на початковому рівні підготовки майбутніх програмістів. У ньому доступна для розуміння робота з необхідними процедурами і функціями, загальною синтаксичною конструкцією мови. Однак, Паскаль давно вже морально застарів і досвідченими програмістами не може застосовуватися, остільки існує ряд інших, більш гнучких і практичних у використанні мов.

4. ПРОЕКТУВАННЯ ІНТЕРФЕЙСУ

4.1. Обгрунтування обраного виду інтерфейсу

У даному програмному продукті інтерфейс - це робота з графічним режимом. Він дуже зручний у використанні, приємно сприйнятливий для очей. У ньому зможе розібратися навіть зовсім недосвідчений користувач. У нижній частині екрана є рядок підказок, які ще більше спрощують програму для користувача. Тому я вважаю, що обраний мною вид інтерфейсу є актуальним у плані інформаційно-довідковому програмному продукті.

Малюнок 4.1-Схема організації інтерфейсу

4.2. Особливості організації обраного графічного режиму

Даний інтерфейс складається з кількох пунктів і одиниць: основне меню має вигляд централізованого списку, за яким легко пересувається рядок вибору, інформаційно-довідкове меню має також централізований список пунктів, інтерфейс наочного уявлення персонального комп'ютера розроблявся з урахуванням надання користувачу зорове уявлення системного блоку з усіма пристроями . У даній роботі статусний рядок має вигляд: затвердити, рух вгору, рух вниз, вихід з програми або меню.

Малюнок 4.1. надає схему організації даного інтерфейсу, який складається з шести активних вікон, легко викликають у будь-який момент. Стрілками вказано взаємодія вікон між собою, а також цикл виходу з програми. Статусний рядок допоможе без зусиль пересуватися між вікнами.

5. ОПИС ПРОГРАМНОЇ РЕАЛІЗАЦІЇ

5.1. Функціонально-логічна схема

Дана схема надає функціонально-логічну схему.

Малюнок 5.1-Функціонально-логічна схема

Малюнок 5.1 представляє функціонально-логічну схему, яка реалізує логічну функціональність блоків програми. Кожен пункт програми виконує певну дію, тому від кожного пункту зображена лінія, яка показує дію обраного пункту.

5.2. Опис структур та форматів

У даному розділі я опишу вихідні дані і постараюся розібрати їх структуру

5.1.1. Вихідні дані

Вихідними даними є дані в пам'яті файлів, що зберігаються на жорсткому диску комп'ютера. Ці файли використовуються для виведення інформації про обрані пристроях персонального комп'ютера, а також для виводу інформації про керівництво користувача. Вони мають розширення "*. txt".

5.3. Основні процедури

Нижче перераховані процедури, які зустрічаються в програмі.

Procedure init ();

Процедура для ініціації графічного режиму

Procedure meinmenu (i: integer);

Процедура для реалізації робочого головного меню.

Procedure comp ();

Процедура для промальовування пристроїв персонального комп'ютера

Procedure titl ();

Відображає титульний лист з інформацією про автора програми.

Procedure WorSpece ();

Спочатку очищає екран, потім промальовує розроблений інтерфейс і створює вікно для відображення файлів з інформаційно-довідкової бази.

Procedure colo ();

Процедура для виведення екрана привітання

Procedure Read (name: string);

Процедура для ініціалізації файлу.

Procedure proff (i: integer);

Ініціалізує графічний віконний інтерфейс зі списком наявного матеріалу для інформаційно-довідкової бази, потім цей список відображається в спеціальному вікні, де пропонується вибрати або змінити читається матеріал.

Procedure fajl;

Пересування по інформаційному графічному вікна і вибір певної інформації для перегляду.

5.4. Схема взаємодії підпрограм

У даному розділі буде розглянуто взаємодію процедур програми між собою

На малюнку 5.3 відображена схема зв'язків між основними функціями програмного продукту. Стрілка від однієї функції до іншої означає те, що перша функція викликається другий в процесі роботи програми.

Малюнок 5.3-Схема взаємодії підпрограм

КОМПЛЕКС ПОСТАВКИ І ПОРЯДОК УСТАНОВКИ

У даному розділі буде розглянуто комплекс поставки програмного продукту, а також порядок встановлення його.

5.1 Комплект поставки

Програмний продукт поставляється на дискеті 3,5 ". У кореневому каталозі дискети знаходиться каталог Saniokkurs, що містить наступні файли:

komp. pas - головний виконуваний файл;

Egavga. Bgi - драйвер відеоадаптера;

Keyrus. Com - драйвер клавіатури;

Також у папці Saniokkurs знаходиться ще один каталог, що містить файли

help. txt - файл з довідковими відомостями по роботі з програмою;

mat. txt - файл, що містить інформацію про материнську плату;

proc. txt - файл, що містить інформацію про процесор;

video. txt - файл, що містить інформацію про відеокарту;

zvuk. txt - файл, що містить інформацію про звуковий карті;

blok. txt - файл, що містить інформацію про блок живлення;

slot. txt - файл, що містить інформацію про слоти пам'яті;

cd. txt - файл, що містить інформацію про CD - ROM;

gest. txt - файл, що містить інформацію про жорсткому диску;

5.2. Порядок встановлення

Процедура інсталяції полягає в наступному:

- Засобами операційної системи створюється каталог для програми (можливо також використання вже існуючого каталогу, але створення для програми окремого каталогу є кращим);

- Засобами операційної системи файли, що входять у комплект постачання, переносяться з каталогу Saniokkurs дискети в підготовлений каталог.

5.3. Запуск програмного продукту

Для запуску програмного продукту для початку необхідно виконати файл Keyrus. Com, а після запустити файл komp. Exe. У разі відсутності деяких файлів, система видасть відповідне попередження, і якщо ці файли були критично важливими, припинить роботу.

6. АНАЛІЗ ЕФЕКТИВНОСТІ

Дана програма має досить якісним і зрозумілим інтерфейсом. Користувач без праці може зорієнтуватися при запуску додатка за допомогою підказок, що знаходяться в нижній частині екрана. Також одним з достоїнств програми є те, що діалог користувача з програмою здійснюється за допомогою зрозумілих і досить зручних діалогових вікон. Слід також відмітити те, що в цілому, програма виконана в класичному варіанті для додатків, розроблених для операційної MS - DOS. Тобто, це зручна, не набридлива колірна гама, яка не дратує після довгої роботи органи зору користувача.

У програмі реалізована зручна навігація по інформаційній базі, досить зрозуміле наочне зображення пристроїв персонального комп'ютера, насичена інформаційна база.

ВИСНОВКИ

Після завершення роботи над програмою, її можна протестувати і виявити як переваги, так і недоліки. Мною були виконані поставлені завдання, а саме:

- У програмі був реалізований зручний графічний користувальницький інтерфейс

Також слід додаткові переваги: ​​це можливість поповнення бази новими інформаційними матеріалами.

У майбутньому, можлива модернізація програми в наступних напрямках:

- Зробити програму більш зручною при читанні матеріалу з інформаційної бази;

- Зробити програму під більш сучасну операційну систему;

СПИСОК ВИКОРИСТАНОЇ ЛІТЕРАТУРИ

1. "Програмування в середовищі Turbo Pascal 7.0", А.І. Марченко; 1998

2. Конспект лекцій з предмету "ВП і АЯ"

3. Енциклопедія сучасного персонального комп'ютера Москва 2005р.

4. Ресурс у мережі Інтернет:

5. http:// garbo. umasa. fi / pc / turboobj. html

6. http:// garbo. umasa. fi / pc / turbopas. html

7. http:// infobase. hypermart. net / pascal / programs. html

8. http:// infocity. kiev. ua /

9. Самовчитель Turbo Pascal О.А. Меженний Київ 2004.

Додаток А

ТЕХНІЧНЕ ЗАВДАННЯ НА ПРОЕКТОВАНОЇ ПРОГРАМНИЙ ПРОДУКТ

А.1 Загальні відомості

Повна назва програмного продукту: "Розробка інформаційно-довідкової системи" Пристрій персонального комп'ютера ". Її умовне позначення" ОППК ". Робота виконана студентом 1-го курсу Донецького державного інституту штучного інтелекту (ДонДІШІ), факультету сучасних комп'ютерних інформаційних технологій, групи СУА-05 , Булавіним Олександром Миколайовичем.

Підставою для розробки "ОППК" є завдання, видане кафедрою Програмного забезпечення інтелектуальних систем (поїсом).

Плановий термін початку роботи: 17.02.06.

Дата захисту роботи: 22.05.06.

Курсова робота виконується згідно з графіком, наведеним у таблиці А.1.

А.2 Призначення створення програми ведення

Програма призначена для навчання користувача основних пристроїв персонального комп'ютера

А.3 Вимоги до програми

А.3.1. Вимоги до програми в цілому

У цілому до програми пред'являються наступні вимоги:

зручний і простий для користування графічний інтерфейс;

зручний спосіб введення-виведення даних;

контроль дій користувача, пов'язані з роботою програми;

зберігання інформації в зовнішньому джерелі даних;

- Наявність довідкової інформації

А.3.2. Вимоги до завдань і функцій програмного продукту

Програма повинна реалізувати наступні функції:

зручний доступ до інформаційно-довідкового матеріалу;

висновок легко доступною для сприйняття довідкової інформації;

А.3.3. Вимоги до програмного забезпечення

Програма буде реалізована на мові Turbo Pascal 7.0 і для її роботи необхідна наявність операційної системи MS - DOS 5.0 і вище.

А.3.4. Вимоги до технічного забезпечення

Для коректної роботи програми необхідні:

IBM - сумісний ПК з процесором не нижче 80386;

VGA монітор.

А.4 Стадії розробки програми:

Таблиця А.1 - Стадії розробки програми

Додаток Б

КЕРІВНИЦТВО КОРИСТУВАЧА

Допомога при роботі з інформаційно-довідковою системою

- Про програму

Відображає реквізити.

- Наочне уявлення персонального комп'ютера.

Відображає наочну інформацію основних пристроїв

персонального комп'ютера

- Інформаційний матеріал

Відображає список доступних для розгляду тим. Вибравши цей пункт в меню з'явиться вікно з назвою основних пристроїв персонального комп'ютера. . Використовуючи клавіші "вгору", "вниз" і "enter" ви можете вибрати пристрій, який вас цікавить.

- Керівництво користувача

Без коментарів.

- Вихід

Використовуючи цей пункт ви можете вийти з програми.

Додаток В

Лістинг програми

USES GRAPH, CRT;

var

ch: char;

s, k, r: integer;

st: string;

com: char;

OldPattern: FillPatternType;

procedure init; {iniciiryet grafiky}

var gd, gm: integer;

begin

gd: = Detect;

initgraph (gd, gm ,'');

if GraphResult <> grok then

begin

writeln ('ПОМИЛКА! ГРАФІЧНИЙ РЕЖИМ НЕ Ініціалізувати'); {PROVERKA NA INICIACIY}

END;

end;

PROCEDURE MAINMENU (i: integer);

var

m: integer;

begin

CLEARDEVICE; {O4ISTKA EKRANA}

{---------------------- МАЛЮЄМО ДИСКЕТИ ------------------------- -------------}

setfillstyle (1,9);

BAR (100,100, 200, 200);

setfillstyle (1,8);

BAR (105,105,110,110);

BAR (190,105, 195,110);

setfillstyle (1,8);

BAR (130,100,170,140);

setfillstyle (1,15);

BAR (120,150,180,180);

line (130,155,170,155);

line (130,160,170,160);

line (130,165,170,165);

line (130,170,170,170);

outtextxy (120, 190, 'SUMSUNG');

{------------------------ МАЛЮЄМО CD ----------------------- -----------------}

setBkcolor (10);

setcolor (15);

setfillstyle (1,6);

bar3D (0,460, 200,477,0, FALSE);

outtextxy (40,465, 'ENTER-ВИБРАТИ');

bar3D (210,460,400,477,0, FALSE);

outtextxy (240,465, 'ВГОРУ-РУХ ВГОРУ');

bar3D (420,460,638,477,0, FALSE);

outtextxy (460,465, 'ВНИЗ-РУХ ВНИЗ');

SETLINESTYLE (SOLIDLN, 0,3); {risuet liniu}

setcolor (12);

setfillstyle (9,14); {wablon zapolnenij i cvet}

bar3d (240, i, 500, i +40,0, false); {risuem paralelepiped 1,2,3,4-koordinati; 0-glubina, fals-otobragenie grani}

setcolor (8); {cvet wrifta}

settextstyle (6,0,3); {vivod texsta; 4-kod wrifta; 0-kod napravlenij; 3-kod razmera}

outtextxy (270,105, '1. Про ПРОГРАМІ ');

outtextxy (270,155, '2. НАОЧНІСТЬ ПРЕДСТОВЛЕНІЕ ПК ');

outtextxy (270, 205, '3. Інформаційно МАТЕРІАЛ ');

outtextxy (270,255, '4. КЕРІВНИЦТВО КОРИСТУВАЧА ');

setcolor (red);

outtextxy (290,305, '5. ВИХІД');

gETfILLpattern (oldpattern);

setcolor (blue);

setfillpattern (oldpattern, blue);

circle (565,300,60);

floodfill (565,300, blue);

setcolor (green);

setfillpattern (oldpattern, green);

circle (565,300, 20);

floodfill (565,300, green);

SETCOLOR (RED);

settextstyle (4,0,2);

outtextxy (530,266, 'ESPERANZA');

outtextxy (510,300, 'CD-R');

end;

PROCEDURE COMP;

var

i: integer;

BEGIN

INIT;

setBkcolor (11);

settextstyle (6,0,3);

setcolor (red);

bar 3 D (0,460,290,477,0, FALSE);

outtextxy (30,465, 'ENTER-ПОВЕРНЕННЯ У ОСНОВНИЙ МЕНЮ');

bar 3 D (320,460,638,477,0, FALSE);

outtextxy (410,465, 'F 2-ВИХІД ІЗ ПРОГРАМИ');

{------------------------------------------------ МАЛЮЄМО СИСТЕМНИЙ БЛОК -----}

setfillstyle (1,8);

bar 3 d (180,100,400,300, 20, TRUE);

LINE (410,280,460,280);

outtextxy (461,280, 'СИСТЕМНИЙ БЛОК');

line (410,270,440,270);

outtextxy (441,270, 'СИГНАЛ роботи процесора');

gETfILLpattern (oldpattern);

r: = 2;

setcolor (blue);

setfillpattern (oldpattern, blue);

circle (410,270, r * 2);

floodfill (410,270, blue);

setcolor (green);

setfillpattern (oldpattern, green);

circle (410,270, r * 1);

floodfill (410,270, green);

{--------------------------------------------- Малюємо материнську плату- -----}

setcolor (red);

setfillstyle (1,10);

bar (190,160,340,290);

LINE (330, 200,440, 200);

outtextxy (440, 200, 'Материнські плати');

{---------------------------- Малюємо жорсткий диск ------------------ ----------}

setfillstyle (1,7);

bar3d (195,165,230,175,3, TRUE);

line (200,170,145,170);

outtextxy (45,166, 'ЖОРСТКИЙ ДИСК');

{--------------------------------------------- Малюємо процесор - ------------}

SETCOLOR (6);

setfillstyle (1,6);

for i: = 1 to 30 do

circle (280,220,25-i);

line (280,220,440,220);

outtextxy (440,220, 'ПРОЦЕСОР');

{------------------------------------------- МАЛЮЄМО ВІДКРИТЕ ---- -----------}

setfillstyle (10,6);

BAR (180, 200,220,215);

line (185, 205,122, 205);

outtextxy (40, 203, 'ВІДКРИТЕ');

{------------------------------------------- МАЛЮЄМО Звукові карти --- ---------}

setfillstyle (7,7);

BAR (180,240,215,250);

LINE (190,250,155,250);

outtextxy (40,249, 'Звукові карти');

{------------------------------------------ МАЛЮЄМО БЛОК ЖИВЛЕННЯ ---- -----------}

setfillstyle (10,8);

BAR (185,105,245,140);

outtextxy (187,120, '3 0 0 W ');

LINE (185,110,140,110);

outtextxy (40,106, 'БЛОК ЖИВЛЕННЯ');

{---------------------------------------- МАЛЮЄМО Слот памяті ------ -----------}

setfillstyle (2,2);

BAR (260,260,270,280);

BAR (280,260,290,280);

LINE (265,270,140,270);

LINE (285,277,140,270);

outtextxy (40,267, 'Cлот ПАМ'ЯТІ');

{--------------------------------------- МАЛЮЄМО CD-ROM ------ ------------------}

LINE (400,140,420,125);

LINE (400,160,420,145);

line (405,145,415,138);

LINE (410,140,460,140);

circle (410,148,2);

setcolor (red);

outtextxy (461,140, ​​'CD-ROM');

{------------------------------------- МАЛЮЄМО флопік ---------- ---------------}

line (415, 195,460, 195);

outtextxy (461, 190, 'флоппі-ДИСК');

line (405, 200,415, 193);

line (405,210,415, 203);

line (405, 200,405,210);

line (415, 193,415, 203);

setlinestyle (1,2,2);

line (407, 205,413, 201);

readkey;

end;

PROCEDURE TITL;

VAR

I, k, j: integer;

BEGIN

INIT;

CLEARDEVICE;

i: = 60;

{--------------------------- Малюємо миша -------------------- ------------}

setfillstyle (1,4);

fillellipse (320,240,80,140);

setfillstyle (1,1);

fillellipse (320,240,60, 20);

setcolor (15);

settextstyle (4,0,30);

outtextXY (295,235, 'SVE N');

line (250,180,390,180);

line (320,180,320,100);

{------------------------------------------------- ----------------------}

SETFILLSTYLE (1,15);

setcolor (black);

settextstyle (9,0,15);

bar3D (0,460,300,477,0, FALSE);

outtextxy (40,465, 'ENTER-повернення в основне меню');

bar 3 D (320,460,638,477,0, FALSE);

outtextxy (420,465, 'F 2-вихід з програми');

setcolor (10);

outtextxy (120, i, 'ДОНЕЦЬКИЙ ДЕРЖАВНИЙ ІНСТИТУТ ШТУЧНОГО ІНТЕЛЕКТУ');

delay (200);

outtextxy (140, i +40, 'КАФЕДРА ПРОГРАММНОГ ЗАБЕЗПЕЧЕННЯ ІНТЕЛЕКТУАЛЬНИХ СИСТЕМ');

delay (200);

outtextxy (230, i +80, 'Курсова робота');

delay (200);

outtextxy (170,210, 'З ДИСЦИПЛІНИ: "АЛГОРИТМІЧНІ МОВИ І ПРОГРАМУВАННЯ"');

delay (200);

outtextxy (120,260, 'ТЕМА: "Розробка Інформаційно-довідкова система"');

delay (200);

outtextxy (160,280, '"пристроїв персонального комп'ютера"');

delay (200);

outtextxy (480,300, 'ВИКОНАВ:');

delay (200);

outtextxy (460,320, 'СТ. ГР. СУА-05:');

delay (200);

outtextxy (460,340, 'Булавін ОЛЕКСАНДР');

readkey;

end;

procedure WorSpece;

begin

setcolor (15);

setfillstyle (1,9);

bar3d (0,0, getmaxX, getmaxY, 0, true);

setfillstyle (1,7);

setcolor (0);

bar3d (15,15, getmaxX-15, getmaxY-15, 0, true);

setcolor (4);

setfillStyle (1,8);

bar3d (16,16, getmaxX-16, 30,0, true);

setcolor (0);

line (17,32,17, getmaxY-17);

line (17,32, getmaxX-17, 32);

line (getMaxX-17, 32, getmaxX-17, getmaxY-17);

line (17, getmaxY-17, getmaxX-17, getmaxY-17);

setcolor (2);

settextstyle (9,0,15);

bar3D (0,460,210,477,0, FALSE);

outtextxy (40,465, 'F2-ВИХІД');

bar 3 D (400,460,638,477,0, FALSE);

outtextxy (400,465, 'ВГОРУ-повернення в основне меню');

end;

procedure colo;

var

m: integer;

n: fillpatterntype;

begin

setcolor (red);

settextstyle (3,0,1);

outtextxy (240,50, 'Приготуйте мені, будь ласка, на завтра ");

outtextxy (240,57, 'комп'ютер, але я не знаю, який');

outtextxy (240,64, 'конфігурації ...');

setcolor (14);

outtextxy (280,71, 'Дзвінок клієнта в комп'ютерну фірму');

setcolor (13);

for m: = 1 to 60 do

ellipse (300,240,180-4 * m, 0 +4 * m, 100 +6 * m, 30 +2 * m);

setfillstyle (1,7);

bar (190,150,410,350);

setfillstyle (1,11);

bar (205,160,395,340);

setcolor (0);

setfillpattern (fillpatterntype (n), 7);

fillellipse (300,370,40, 20);

setfillstyle (10,10);

bar (110, 200,140,340);

bar (440, 200,470,340);

SETCOLOR (RED);

outtextxy (205,170, 'К О М П Ь Ю Т Е Р-ЦЕ ...');

outtextxy (230, 190, 'ХОЧЕТЕ У ЦЬОМУ');

outtextxy (250,210, 'РОЗІБРАТИСЯ ...');

outtextxy (255,230, 'Тисніть ENTER!');

SETCOLOR (0);

outtextxy (205,260, 'ЩОБ ВИЙТИ З ПРОГРАМИ');

outtextxy (270,280, 'тисніть F2');

readkey;

end;

procedure read (name: string);

var fname: text;

s: string;

y: Integer;

pos: longint;

begin

assign (fname, name);

reset (fname);

while not eof (fname) do

begin

y: = 30; setcolor (0);

for pos: = 1 to 40 do

begin

y: = y +10;

readln (fname, s);

outtextXY (30, y, s);

end;

com: = readkey;

readkey;

if com = # 60 then break

else mainmenu (90);

end;

end;

Procedure fajl;

PROCEDURE proff (i: integer);

var

k: integer;

begin

CLEARDEVICE; {O4ISTKA EKRANA}

setBkcolor (12);

setcolor (2);

setfillstyle (1,14);

bar3D (0,460, 200,477,0, FALSE);

outtextxy (40,465, 'ENTER-ВИБРАТИ');

bar3D (210,460,400,477,0, FALSE);

outtextxy (240,465, 'ВГОРУ-РУХ ВГОРУ');

bar3D (420,460,638,477,0, FALSE);

outtextxy (460,465, 'ВНИЗ-РУХ ВНИЗ');

SETLINESTYLE (SOLIDLN, 0,3); {risuet liniu}

setcolor (12);

setfillstyle (9,9); {wablon zapolnenij i cvet}

bar3d (220, i, 500, i +40,0, false); {risuem paralelepiped 1,2,3,4-koordinati; 0-glubina, fals-otobragenie grani}

setcolor (15); {cvet wrifta}

settextstyle (6,0,3); {vivod texsta; 4-kod wrifta; 0-kod napravlenij; 3-kod razmera}

outtextxy (260,50, '1. ЖОРСТКИЙ ДИСК ');

outtextxy (260,90, '2. Материнські плати ');

outtextxy (260,140, ​​'3. ПРОЦЕСОР ');

outtextxy (260, 190, '4. ВІДКРИТЕ ');

outtextxy (260,240, '5. Звукові карти ');

outtextxy (260,290, '6. БЛОК ЖИВЛЕННЯ ');

outtextxy (260,340, '7. Слот памяті ');

outtextxy (260,390, '8. CD-ROM ');

outtextxy (265,440, '9. ВИХІД ');

end;

BEGIN

INIT;

k: = 35;

proff (35);

repeat

repeat

ch: = readkey;

until (ch = # 13) or (ch = # 80) or (ch = # 72) or (ch = # 60);

begin

if ch = # 60 then

begin

CLOSEGRAPH;

break; {ostanovka proceduru}

end;

if (ch = # 80) and (k> = 35) and (k <435) then

begin

k: = k +50;

proff (k);

end;

if (ch = # 72) and (k> 35) and (k <= 435) then

begin

k: = k-50;

proff (k);

end;

if ch = # 13 then

begin

if k = 435 then

begin

CLOSEGRAPH;

break;

end;

if k = 35 then

begin

CLRSCR;

WorSpece;

read ('c: \ infa \ GEST. txt');

end;

if k = 85 then

begin

CLRSCR;

WorSpece;

read ('c: \ infa \ mat. txt');

end;

if k = 135 then

begin

CLRSCR;

WorSpece;

read ('c: \ infa \ proc. txt');

end;

if k = 185 then

begin

CLRSCR;

WorSpece;

read ('c: \ infa \ video. txt');

end;

if k = 235 then

begin

CLRSCR;

WorSpece;

read ('c: \ infa \ zvuk. txt');

end;

if k = 285 then

begin

CLRSCR;

WorSpece;

read ('c: \ infa \ blok. txt');

end;

if k = 335 then

begin

CLRSCR;

WorSpece;

read ('c: \ infa \ slot. txt');

end;

if k = 385 then

begin

CLRSCR;

WorSpece;

read ('c: \ infa \ cd. txt');

end;

end

else

proff (k);

end;

until ch = # 60;

end;

BEGIN

INIT;

colo;

k: = 90;

MAINMENU (90);

repeat

repeat

ch: = readkey;

until (ch = # 13) or (ch = # 80) or (ch = # 72) or (ch = # 60);

begin

if ch = # 60 then

begin

CLOSEGRAPH;

break; {ostanovka proceduru}

end;

if (ch = # 80) and (k> = 90) and (k <290) then

begin

k: = k +50;

MAINMENU (k);

end;

if (ch = # 72) and (k> 90) and (k <= 290) then

begin

k: = k-50;

MAINMENU (k);

end;

if ch = # 13 then

begin

if k = 290 then

begin

CLOSEGRAPH;

break;

end;

if k = 90 then

begin

titl;

end;

if k = 140 then

begin

comp;

end;

if k = 240 then

begin

CLRSCR;

WorSpece;

read ('c: \ infa \ help. txt');

end;

if k = 190 then

begin

fajl;

end

else

mainmenu (k);

end;

end;

until ch = # 60;

END.

Додаток Г

ЕКРАННІ ФОРМИ

Рисунок Б.1 Екран привітання

Рисунок Б.2 Вид головного меню

Малюнок Б.3 Вид вікна про програму

Малюнок Б.4 Вид вікна наочного подання персонального комп'ютера

Малюнок Б.5 Вид вікна інформаційно-довідкового матеріалу

Рисунок Б.6 Вид вікна в режимі відкритого файлу